﻿Imports DTO
Imports DAO
Public Class QuiDinhBUS

    Public Function LayDanhSach() As IList
        'Kiem tra business rule neu co
        Dim qdDao As New QuiDinhDAO()
        Dim ds As IList
        ds = qdDao.LayThongSoQuiDinh()
        Return ds
    End Function

    Public Function CapNhatQuiDinh(ByVal qdDto As QuiDinhDTO) As Integer

        Dim qdDao As New QuiDinhDAO()
        qdDao.CapNhatQuiDinh(qdDto)

    End Function


End Class
